home *** CD-ROM | disk | FTP | other *** search
/ Interactive Media Design Review 1999 / Interactive Media Design Review 1999.iso / pc / allfiles / tokyo / east.dir / 00013_Script_east < prev    next >
Text File  |  1999-04-26  |  612b  |  26 lines
  1. global EsprtList
  2.  
  3. on east
  4.   if rollover(43) then
  5.     cursor [1,2]
  6.     set the loc of sprite 39 to point(the mouseH,the mouseV)
  7.     animate 39, 164, 179
  8.     
  9.   else
  10.     if rollover(40) then
  11.       cursor 200
  12.       set the loc of sprite 38 to point(the mouseH,the mouseV)
  13.       animate 38,17, 35
  14.       
  15.     else
  16.       cursor [9,10]
  17.       set the loc of sprite 39 to point(-100,-100)
  18.       set the loc of sprite 38 to point(-100,-100)
  19.       
  20.       repeat with i = 1 to count(EsprtList)
  21.         if count(EsprtList)>0 then run getat(EsprtList,i)
  22.       end repeat
  23.       
  24.     end if
  25.   end if
  26. end